﻿Imports Clases
Imports System.IO
Public Class frmPrincipal

    Private Sub frmPrincipal_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim miSerie As New Serie
        miSerie.Nombre = "Naruto"
        listaSeries = New List(Of Serie)
        listaSeries.Add(miSerie)
        If primerInicio = True Then

        End If
        If Directory.Exists(My.Application.Info.DirectoryPath & "\Peliculas") Then

        Else
            Directory.CreateDirectory(My.Application.Info.DirectoryPath & "\Peliculas")
        End If
        If Directory.Exists(My.Application.Info.DirectoryPath & "\Series") Then

        Else
            Directory.CreateDirectory(My.Application.Info.DirectoryPath & "\Series")
        End If

    End Sub

    Private Sub btnMisSeries_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMisSeries.Click
        cargarSeries = True
        cargarPelis = False
        frmPelisYSeries.Show()
    End Sub

    Private Sub btnMisPeliculas_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMisPeliculas.Click
        cargarPelis = True
        cargarSeries = False
        frmPelisYSeries.Show()
    End Sub
End Class